VXFORM0 vxBase Sample Application Form2% QuitButton StartButton Start VerBox Picture1 wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwww wwwwwwwwwwww wwwwwwwwwwww wwwwwwwwwwww wwwwwwwwwwww wwwwwwwwwwww wwwwwwwwwwww 3333338 3333333 3333333 33333338 3333333 33333? 333?3?333? 33333333? 333333 3338333333 333333338 3333333 333333 3333333 333333 wwwwwww wwwwwww wwwwwww wwwwwww wwwwwww wwwwwww wwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww Label3 Written by Terry Orletsky MS Sans Serif Label2 E Copyright 1991-1993 by vxBase Systems Label4 AirCraft Brokerage System MS Sans Serif Label1 vxBase Sample Application MS Serif QuitButton_Click5 vxCtlGrayReset vxDeallocate StartButton_Click Form2Active FALSE Form3Active Form4Active Form5Active Form6Active Form7ActiveE vxFileb VXFORM0 VXFORM1 @ Form_Load vxCtlGraySet vxSetLanguage VX_FRENCHs vxSetHandles Form_Paint vxFormFrame hWndu vxInit Form_Unload Cancel FromExitButts vxUseDbf vxCreateNtx NExprp vxCloseAll vxSetLocks9 VX_GERMAN vxSetString3 VX_ITALIAN vxUseNtx vxSelectDbf vxZap vxNtxDeselect vxTop vxField bastatg bajr, bajs+ vxAppendBlankY vxReplString! vxWrite vxSkip vxEofT vxRecNo^ VX_ENGLISHC vxReindex[ VerBox vxGetVersion VerBox_Change vxBrowse ThisForm DbfHandle NtxHandle EditMode FilterT EditMenu StartRec Caption Passes vxSeek vxUseDbfRO vxSeekFast Form_Resize AircustDbf Aircust1Ntx{ vxNtxRecNo vxClose VX_DUTCH vxReplLogical Form_Load register the task with the vxbase multitask listl we are using enhanced controls so set system gray to dark grayl called twice to ensure this window stays on top increase number of handlesd for the task from 20 to 32- Not enough Handles put current vxBase version num in verboxr Version turn off auto locking Form_Paint Form_Resize Form_Unload end entire task if exit button is truet or error occurred in form_loadl if this is master vxbase task and other vxbase tasks are active then we can't exitt reset system disabled gray tone QuitButton_Click StartButton_Click set active flags off- test if files in right directory \vb\vxbtest\airtypes.dbf Demo files not found! hide opening form and show menu form